﻿Public Class BETopico

    Public Const ID_TOPICO As String = "id_topico"
    Public Const ID_SUBCATEGORIA As String = "id_subcategoria"
    Public Const ID_MENSAGEM As String = "id_mensagem"
    Public Const VISIVEL_TOPICO As String = "visivel_topico"
    Public Const TITULO_TOPICO As String = "titulo"
    Public Const TOTAL_POSTS As String = "totPosts"
    Public Const VISUALIZACOES As String = "visualizacoes"

    Private _id As Integer
    Private _idSubcategoria As Integer
    Private _idMensagem As Integer
    Private _booVisivel As Boolean
    Private _titulo As String
    Private _totPosts As Integer
    Private _totVisualizacoes As Integer
    Private _lstPosts As List(Of BEPost)
    Private _mensagemTopico As BEMensagem

    Public Property Id() As Integer
        Get
            Return _id
        End Get
        Set(ByVal value As Integer)
            _id = value
        End Set
    End Property

    Public Property IdSubcategoria() As Integer
        Get
            Return _idSubcategoria
        End Get
        Set(ByVal value As Integer)
            _idSubcategoria = value
        End Set
    End Property

    Public Property IdMensagem() As Integer
        Get
            Return _idMensagem
        End Get
        Set(ByVal value As Integer)
            _idMensagem = value
        End Set
    End Property

    Public Property Visivel() As Boolean
        Get
            Return _booVisivel
        End Get
        Set(ByVal value As Boolean)
            _booVisivel = value
        End Set
    End Property

    Public Property Titulo() As String
        Get
            Return _titulo
        End Get
        Set(ByVal value As String)
            _titulo = value
        End Set
    End Property

    Public Property TotPosts() As Integer
        Get
            Return _totPosts
        End Get
        Set(ByVal value As Integer)
            _totPosts = value
        End Set
    End Property

    Public Property totVisualizacoes() As Integer
        Get
            Return _totVisualizacoes
        End Get
        Set(ByVal value As Integer)
            _totVisualizacoes = value
        End Set
    End Property

    Public Property LstPosts() As List(Of BEPost)
        Get
            Return _lstPosts
        End Get
        Set(ByVal value As List(Of BEPost))
            _lstPosts = value
        End Set
    End Property

    Public Property MensagemTopico() As BEMensagem
        Get
            Return _mensagemTopico
        End Get
        Set(ByVal value As BEMensagem)
            _mensagemTopico = value
        End Set
    End Property

End Class
